100 : SYS 36864 110 : .OPT OO 120 : *=$0400 130 :; 140 :;*** AUSLESUNG DER REM-ZEILEN *** 150 :; 160 : LDA #$FF 170 : STA $5A 180 : LDA #$BF 190 : STA $5B 200 : LDA $7A 210 : STA $5F 220 : LDA $7B 230 : STA $60 240 NEXTLINE LDA $5B 250 : CMP #$C4 260 : BCC READ 262 : JMP $C000 275 :; 280 READ LDA #7 290 R0 ADC $5F 310 : STA $5F 320 : BCC R1 330 : INC $60 340 R1 LDY #8 350 : LDA ($5F),Y 360 : JSR DECODE 370 : STA 2 400 : DEY 410 R2 LDA ($5F),Y 412 : BEQ NEXTLINE 415 : JSR DECODE 417 : ROL 420 : LSR 2 430 : ROR 460 : STA ($5A),Y 470 : DEY 475 : BNE R2 480 : CLC 490 : LDA $5A 500 : ADC #7 510 : STA $5A 515 : LDA #8 520 : BCC R0 530 : INC $5B 540 : CLC 560 : BCC R0 600 :; 610 DECODE CMP #160 620 : BCC DE1 625 : SBC #64 630 : RTS 635 DE1 CMP #96 640 : BCC DE2 645 : SBC #32 650 : RTS 655 DE2 CMP #64 660 : BCC DE3 665 : SBC #64 670 DE3 CMP #53 675 : BNE DE4 680 : LDA #34 685 DE4 RTS